home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1998 May / Macworld (1998-05).dmg / Shareware World / Info / Develop / AppleScript / CursorOSAX / Source Code / MouseDown ƒ / MouseDown.c
Encoding:
C/C++ Source or Header  |  1996-09-19  |  282 b   |  16 lines  |  [TEXT/CWIE]
  1. #include <AppleEvents.h>
  2. #include <string.h>
  3.  
  4.  
  5.     
  6.  
  7. pascal OSErr main(AEDescList *aevt, AEDescList *reply, long refCon) {
  8.     Boolean isPressed;
  9.     OSErr err;
  10.     
  11.     isPressed = Button();
  12.     err = AEPutParamPtr(reply, keyDirectObject, 'bool', (Ptr) &isPressed, sizeof(Boolean));
  13.     return err;
  14. }
  15.  
  16.